home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Interactive Media Design Review 1999
/
Interactive Media Design Review 1999.iso
/
pc
/
allfiles
/
Centri
/
Centri.dir
/
00145_Script_Definition
< prev
next >
Wrap
Text File
|
1999-02-25
|
986b
|
29 lines
property whichSprite, orangeSprite, blackSprite
on beginSprite me
set the moveableSprite of sprite the spriteNum of me = TRUE
set the moveableSprite of sprite 22 = TRUE
set the moveableSprite of sprite 23 = TRUE
end
on mouseUp me
if the memberNum of sprite the spriteNum of me = blackSprite then
set the memberNum of sprite the spriteNum of me = orangeSprite
set the visibility of sprite whichSprite = TRUE
set the loc of sprite whichSprite to point (the mouseh, the mousev - 60)
else
set the memberNum of sprite the spriteNum of me = blackSprite
set the visibility of sprite whichSprite = FALSE
end if
end
on getPropertyDescriptionList
set p_list = [¼
whichSprite: [ #default:0, #format:#integer, #comment:"Scroll displacement"],¼
orangeSprite: [ #default:0, #format:#integer, #comment:"orangeSprite"],¼
blackSprite: [ #default:0, #format:#integer, #comment:"blackSprite"]]
return p_list
end